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TITLE TBKSTART 
IDENT ‘'V04=000' 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. 

DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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;++ 
; FACILITY: TRACEBACK 


; ABSTRACT: 
; START UP MODULE FOR TRACEBACK FACILITY. 


; ENVIRONMENT: 

: This beBuE routine invoked by the DEBUG ‘bootstrap’ 

uhen DEBUG . 4B ay ng ane ae eae user image has 
used ane NRE erious eno overt orrent a traceback. 

ROUTINE “BEGIN +4 CALLS TBKSDO. TRACE OUITH T HE SAME 

ARGUMENT sea 4 HAT CLI SENT, except that rather than 

one arg being the A vector’ pointer, it is 

the treceback arg list’ pointer. 


: MODIFIED BY: 
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: Dale Roedger, 20 July 1978: 07 
; REVISION HISTORY: 


6000) 13-JAN-7 KGP “Built this from DEBUG's DBGSTART 
00002 25-feb-7 KGP “Final polish to make traceback 
penrers ie $s ots 
000003 24-feb-78 KGP “ve no ait e error was 
EVERE Mita). ont NUE otherwise. 

Longuard ve vector $s statically 
yt ntained in T to contain the 
mopped oh the ad so that it 

can be used on Success 
000005 8-mar-78 KGP -P-sect names are no TBK... instead of 
quer lapping with DEBUG 

000006 15-JUN-78 DAR PSECT ibutes are changed to correspond 


000004 28-feb-78 KGP 


NAME WN OS OD NA NEW — OOD NIA NE WIN OOO NAME WIN 0 ODNOA UNE WP - OOONO UNE wr 


DANA BB PRE PE EWI III ononononononononon 2 2 


dD 4 | 
v04=000. "SSEp=198e Oc:18:00 UtnacessncStaxstantomans1 8° fy ‘5 


he new bul idios Prore Bre 
iBx CODE and TBKSPLIT are gvte NOWRT, EXE 
07 20-JUL-78 DAR Redefined PSECT’s again th ime for 
the /SHARE aealen in the Ady 


Aoouwm 
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Be te Se Be ee 
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vOes000. DECLARATIONS "OrSee= ibs 02:18:40 PTAACE sme roKSraRsomar:1 | 28% (3, 


-SBTTL DECLARATIONS 


SIFDDEF 3; image file definitions 
SSSDEF 3 eys em error codes 
SSTSDEF 3 signal naming field definitions 


3+ 
; Equated symbols 
buf _siz =256 ; length of getmsg, FAO, and $PUT buffers 


00000100 


OOOO OCOOCOOCSOSOOOCOOCSOOOOCOOCOOOOOOOOOOOO 
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4 
5 
; 
? 
§ 
i 
5 
. 
: ; Data Declarations 
1 
§ 
4 
5 
6 
7 
8 
9 
0 
1 
g 
i 


0 3 
8 ; Special vector that contains the 7 begioning and end address of 
3; TRACE's writable storage area. hird value in the vector is 
0 3 the transfer address of TRACE chet is in this module. 
0000 0 : .PSECT $TBKSABS_ZERO LONG, PIC, SHR, EXE, NOWRT 
00000000' o 0 -ADDRESS writable_stor 3; lowest writable storage location 
OOOOO1FF' 4 -ADDRESS writable_stor + “X1FF ; highest writable location 
00000002" 0 . . LONG beginhere+2 ; start address of mapped TRACEBACK 
wens -PSECT TBKSGLOBAL LONG, PIC, NOSHR, NOEXE 
0000 5 writable_stor: 


Be Se Se Se Be Se Be Oe Se Se Be Ge Se Se ee Se Se Se Se Se Ge Se Se SHH Se Se Oe BH See 
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beginhere = called by DBGBOOT "er ee elke bai18:40 FARAYES Magee, 


-sbttl beginhere = called by DBGBOOT 


p++ 
; FUNCTIONS. DESCRIPTION: 


a a ed at = = = = = = = A sw 8 4 2 1 3 3 ss 2 ss 2 1 2 


s routine suppl tee the interface between the DEBUG 
bootstrap and the BLISS routines which actually DO 
TRACEBACK. ALL we do here is accept the arguments 
that we know DBGBOOT passes on, and pass them on to 
TBKSDO_TRACE in the way that it expects them. 


The real reason for the quistence of this module is 
because of ane eugkin with writable_stor, etc, above. 
This setup is copied irectly from DEBUG so that the 
bootstrap can invoke us in the 


The argument List from CLI/DBGBOOT Looks as follows: 


| address of |} 
{| traceback ' 
H vector H 


{image header | 
| information | 
i image file | 
: information | 


The traceback vector contains four parameters. 
They are ordered as in the picture below: 


+ PC when fault! 
{ occurred ' 
| FP when fault! 
{ occurred ' 
| FP when user } 
H gre called } 
i initially ' 
' eddress of |} 
t signal array | 
' = L table H 
i *begin® addr | 
H symbol table | 
H end’ addr } 


same way it invoked DEBUG. 


TBKSTART 
v04=000 


So 


4 
beginhere - called by DBGBOOT "r8 Pa} 984 Bo :48:25 TRACE she TOKSTART OMAR: 1 nash a) 
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; CALLING SEQUENCE: 
; CALLS #4, beginhere 


; INPUTS: 
: THE ARGUMENT LIST FROM CLI 


; IMPLICIT INPUTS: 
; NONE 


: OUTPUTS: 

; RO, if we decide to RESIGNAL. 
: IMPLICIT OUTPUTS: 

: NONE 


; ROUTINE VALUE: 
; WHATEVER IS IN RO 


; SIDE EFFECTS: 

A TRACEback is produced. 

The decision is made as to whether to EXIT back 
to CLI or RESIGNAL the condition. 


SN FUSION 


-PSECT TBKSCODE BYTE, PIC, SHR, EXE, NOWRT 


beginhere:: 
«WORD 0 


Note that the following few instructions write into the argument list 
: gasses sf this routine from CLI. This disguises the fact that DEBUG 
; 1s aroun 


50 04 AC 00 OVL 4 (AP) ,RO 3; Pick up address of traceback vector 
80 DD PUSHL (RO)+ ; Pass on PC when fault occurred 
80 OD PUSHL (RO)+ 3 Pass on FP when fault occurred 
80 DD PUSHL (RO)+ ; Pass on initial FP of image 
Hf DD PUSHL (RO)+ : pees on ptr to signal array 
5 DD PUSHL RO 3; Pass on address o Lon ord vector 
3 shoes syanel table raEe® addresses 
3 are sreree across ~ invocations. 
Oc AC DD PUSHL 12(AP) 3 push the address of 
3 ay A header ot ealtes prepared 
: image activator 
20 10 AC 0 i 16(AP), RO 3 get the address of the’ image file 
1 O2A C MOVZL fd8y_filnamot (RO) .R1 
7E 51 + ADDL RO,R1,-(SP) 3; and push onto stack 
TE 08 Ad C MOVZWL ifdSw_chan(RO),-(SP) ; push the channes “number also 
00000000'EF 06 FB CALLS #6, TBKSDO_TRACEB : and do TRACEBACK 


; bo. TRACEB returns the same except ign name we pgeses 

3; it? above. Now we force an EX! f the condi 

3 severity level was SEVERE (or FATAL), or return 

> so that the bootstrap can allow the image to CONTINUE, 
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. 19 - : otherwise. (by simply passing on our SS$_CONTINUE) 
A 1 
04 50 603 0 4 A 13 CMPZV) = MSTSSV_SEVERITY ,#STS$S_SEVERITY,RO,#STS$K_SEVERE 
4 F 1 Bae eyese EXIT 
50 1 f 1 18 MOVZWL #SS$_CONTINUE,RO ; The bootstrap will arrange to have 
! RET 3; the image continue running. 
i§ FORCE_EXIT: 
50 10000000 8F C8 9 1812 #*X10000000,R0 3; Set “already printed’ bit in exception 
; EXIT_S RO 3 mame and exit with that as code. 


ae 


~ END BEGINHERE 


TBKSTART 16-SEP-1984 02:12:04 /VMS Ma v04-00 Pa 7 
Symbol table iets 82:18:26 YaRA RACE.SRC TBKSTART. MAR; 1 - (3) 
BEGINHERE 9 RG 04 
BUF SIZ s 
FORCE-EXIT R 04 
IF D$W_CHAN = 
IF OSW_F ILNAMOFF = 
SS$_ CONTINU = 
STSSK_SEVERE = 4 
STS$S_SEVERITY = 3 
STS$V_SEVERITY = 
SYSSERIT teeeeeee GX 4 
TBKSDO TRACEB renters O¢ 
WRITABCE_STOR 00000000 R 3 

$eeeereseen recor eeecee 

H Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes 
° e 00000000 ( 0.) 00 ¢ 0.) NOPIC USR CON ABS _ LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABS$ 00000000 ( -) QO1¢ +1.) NOPIC USR CON S LCL NOSHR EXE RD WRT NOVEC BYTE 
STBKSABS_ZERO O00000C (= 12.) § ( §°} PIC USR CON REL LCL SHR EXE RD NOWRT NOVEC LONG 
TBKSGLOBAL 0000000 < a me PIC USR CON REL LCL NOSHR NOEXE' R&D WRT NOVEC LONG 
TBKSCODE 000004 ( 69.) 4( 4.) PIC USR CON REL LCL SHR EXE RD NOWRT NOVEC BYTE 

dines ennnnenenons 
! Performance indicators ; 

Phase Page faults CPU Time Elapsed Time 
inte tot feet ton H 00: 00:00:67 0:00:01.37 
Command processing 1 67 0: 3: 3° 
Pass 1 21 4.41 :00:17. 
syabol table sort se :00. :00:02. 
Symbol table output 3 


j 
: ; : :00:00.0 
Psect synopsis output 1 :00:00. 0:00:00.0 
Cross-reference output 9 :00:00. 9 3: :00.0 
Assembler run totals 46 0:00:06. :00:29.1 


i ayorking set Limit was 1400 pages. 

239 20 bytes (a) pages) of virtual memory were used to buffer the intermediate code. 
re were 30 pages of symbol table 1 Seace en d to hold 462 non-local ane local symbols. 
source lines were read in Pass 1, produ object records in Pass 2. 

11 pages of virtual memory were used to define 950 macros. 


Se wesw noes ee Deer ewe nme eee ee} 


Macro Library name Macros defined 
SYS. 42438. 1 
~$52350u age: ESYSi i633 STAR Ye; :2 $ 
Teta ed (all ts 94 


J 4 
Vane a Run Statistics "9rSEP 71882 te 18: % YTRACE E she Rest Bx PAR MAR: 1 eee dy 
531 GETS were required to define 7 macros. 


There were no errors, warnings or information messages. 
MACRO/LIS=LIS$: TBKSTART/OBJ=0BJ$: TBKSTART MSRC$: TBKSTART/UPDATE=(ENH$: TBKSTART) +EXECML$/LIB 


Sa 


Be Be Be Se Be Se Be Be Se Se Be Se Se Be Se Ge Fe Se Be Ge Se Ge Fe Se Se oe FH Se Be oe Se Se FF Se SFOs Se SHS Se Se SF Se SOs SES ee SHS Se ee SH Se Se Se ae 


040 AH-BT13A-SE | NT CORPORATION 


VAX/VMS V4.0 D PROPRIETARY 


